MPT System Book v. 3.3 Contents Copyright(c) 1994,1995 Metatec Corp. All Rights Reserved compactBook buttonClick onClick compactBook &Compact Book buttonClick onClick Script Size DriveListViewer Page id 2 tools Page id 4 Tools Reader Open &Tools Window closeWindow Window ~= Reader "Open &Tools %"? System HxuJlxA Arial ncdVGA playBitmap szMediaSource,stSize {objTarget szFileName,szViewer,szExec 8bkMediaViewer statusMsg "Opening Picture..." g = romDrive() & xisFile( o= default strFileNotFound( = iniString(configFile(),"MEDIA VIEWERS"," \",256) <> " " && = mediaViewer() 5 (file .VWR) xpresent xproperly initialized." playCDAudio wTrackNum,arg2 -- *** wStyle cstyle bits: *** -- -- *** !bitAND 0x0001 = 0 means embedded *** -- ..." isType(logical, bitOR 0 e()," ",256) <> " " && playMovie ,dwLength -- *** -- *** -- *** 2 = 0x0002 controls *** -- -- *** 4 = 0x0004 border *** -- bPageMedia ..." <> 1 -- *** Not e()," ",256) <> " " && (EnterPageMedia (LeavePageMedia playMCI playSequencer ,arg3 -- *** -- *** MIDI..." P -- *** <= 3.2 *** -- < 2 -- *** >= 3.3 *** -- -- *** <= 3.2, bEmbedded param missing ( popup) *** -- e()," ",256) <> " " && playText bFullScreen 5..." e()," ",256) <> " " && playWaveAudio -- *** -- *** ..." P -- *** <= 3.2 *** -- < 2 -- *** >= 3.3 *** -- -- *** <= 3.2, e()," ",256) <> " " && -- *** Handler }prior v3.2/v3.3 *** -- -- *** The call ' ' instead ' now *** -- -- *** contained .VWR. ' \ ' may still, however, be called directly *** -- playMedia ,dwMediaLength,stMediaSize,bIsControls -- *** -- *** -- *** (movies only) *** -- -- *** TypeOfMedia bSysSuspend szTypeOfMedia = szMediaType " && ,& "..." ?<> " i <> e()," ",256) <> " " && " && = 1 -- *** Defaults zero *** -- -- *** Note: fborders x*** -- -- *** supported versions 3.2 *** -- continueMsg "Click d..." fPlacement ..." ) -- *** *** -- -- *** a handler .VWR which returns a ref itself *** -- gwEnterPageTimer 4stack stPageMedia bSuspendPageMedia ' -- *** *** -- / <> f = timerStart("single",500,54, (BeforeImages ) > 0 (AfterImages ) > 0 timerNotify wTimer = enterPageMedia ) > 0 sysSuspendMessages = buttonClick = leavePageMedia ) > 0 MCINotify szStatus,szOperation,szDevice szIdleCmds[] szTemp = = "aborted" E = " dimensions( D) > 0 goToPage" reset } <> mediaType fileExtension( = "WAV" = "MID" "BMP,DIB,GIF,PCX,TIF,WMF" "AVI,MOV,FLI,FLC,MMM" "TXT,DOC" = "RTF" "Rich Format" "Unsupported openIndex szDir, szSysInfo[] gwAppName,wIndexApp,wIndexCaption ghwnd bFirst szDDEName FindWindowByCaption(0, startupDir() & Yield() _n(0, strBadSetup("Cannot " && ] && " = "\" discIssueID(), = baseName( r<> "OK" DDE Link " && ] && " keepRemote ShowWindow( BringWindowToTop( openForm szBookRef gwRomDrive defaultPage "FormViewer" <] & j] & %modal WM_SYSCOMMAND ,wMsg,wParam = 0xF060 shutDown szRetVal = preference("quitPrompt"," 0 = " "Do you really want f"Yes" cleanUp -- simple trap , mag app-specific sysBook didn't isStartup c(startupBookName())) openStartup ) + 1] = " find logError szError,bRequest szLogFile,szSysError,szLogString nErrorNumber = sysErrorNumber fileOnly( ".err" ~(".", seekFile logged on" && p&& " )" && " && \ :" && =" && r=" && sysInfo() & k& "( l%" && && " openMagazine gwShortName,wVersionID, ,wExtension gwStartupDir,wFullScreen # DEVELOP ,szFilters,szPath ] && \ "(*." & ] & "),*." & ] & \ ",ToolBook Books (*.?bk),*.?bk,All Files (*.*),*.*" ] && \ "(*." & ] & "),*." & ] & \ ) > 3 = "\" = openFileDlg(" ","", versionID xisAppBook( strDiscError() " && & ". It incompatible corrupted strWrongVersion( = (bookInfoByBookID( state <> maximized = screenResolution() -- *** May be opening magazine tools e*** -- centerClient myPath <> "\" W) szFileSpec nFoundIt gwMode * = "\" G = SetErrorMode(0x8000 bitOr 0 = SEM_NOOPENFILEERRORBOX; 0 *(SEM_NOCRITICALERRORBOX -- *** fileExists() appears error mode *** -- -) 0x4000 = OF_EXIST = 1) appName discName discIniString("DISC INFO","DiscName","",128) shortName wBookIndex,wInfoItem szBookInfo[][] szBookName, gwBookID runtimePath RuntimePath","",256) discVersionID ","",16) gwConfigFile discConfigFile gwDiscConfigFile indexApp indexCaption setRomDrive szRomDrive ) > 3 = "\" ? = chooseDirectoryDlg("Select ROM n <> <> "\" writeIniItem( -STARTUP"," setStartupDirectory ",".") <> "\" ] = , success setCurrentDrive( setCurrentDirectory( <> -3 = TRUE extension section, entry, /0, bufSize szDiscIni gwBufSize T = 256 discIssueName issueName","",64) issueID","",16) szPref,szDefault ],"Prefs", 9,256) szApp / bOnRomDrive % = ( ","",256) (szAppName (( ! Please replace 3" && 3 && " xfound. acertain the " && \ () && " drive." szVersion szInstalled, %"0.0" %"0.0" " && ] && " !" & " && v && " installed are attempting a" && \ " && && " k& "You #wish upgrade" && \ latest " && ] & "." wrongDiscVersion szDialog %"0.0" %"0.0" f" && && " a" && \ " && && " "Do perform now?" ] & "setup.exe") 6 = " " && ] & " ( && \ "-F" & ] & " .ins" & "Upgrade program asure " && \ ] && " your CD- correct problem." -- *** For NautilusCD, NCD.SBK ca helpAbout shows *** -- -- *** a that B bitmap *** -- OszCompany szHelpAbout,szYear %"y" ] && " " && "Copyright(c)" && f & "," "Portions & ", Metatec Corp." && " rights reserved." & selectDir ",".") -- *** 3.2+ Stuff *** -- szDLL, ftsIndexName 2 = "fts30mtb.dll" wTries = 1 linkDLL ftsSearch( = sysToolBookDirectory & () & fullTextSearch szIndexName a userProperty placed Tools builds must <> NULL <> "\" pgRef = ,windowHandle -- '+have had its path removed -- insert current isObject( a valid -- otherwise... navigate " && $E + , #> + , #? + , #? cFindWindowByCaption strBadSetup Cannot run startupDir discIssueID szSysInfo PbaseName isFile wAppName wIndexCaption wIndexApp Yield Cannot open DDE Link to BringWindowToTop Index. ShowWindow openIndex szSysInfo wRomDrive FormViewer openForm shutDown WWM_SYSCOMMAND WM_SYSCOMMAND Do you really want to exit? preference 06cleanUp quitPrompt shutDown cleanUp w, "@ startupBookName isStartup .&+ +E strBadSetup startupBookName szIdleCmds Cannot find Startup book. send sizeToPage default openStartup -", #? w, #> sysError = contains this text.) startupDir Error logged on sysErrorNumber = isFile szFileName EofileOnly SsysInfo (File Error: in file logError + , #> + , #> + , #> + , #> .&+ +E wFullScreen ,All Files (*.*),*.* strWrongVersion . It may be an incompatible or corrupted file. szSysInfo maximized wStartupDir wExtension W7strDiscError openFileDlg wVersionID default isAppBook screenResolution DEVELOP wShortName qtromDrive ,ToolBook Books (*.?bk),*.?bk,All Files (*.*),*.* Cannot open bookInfoByBookID versionID Open Magazine openMagazine myPath fileExists false isFile szSysInfo wAppName appName DiscName =PdiscIniString DISC INFO discName szSysInfo wShortName shortName szSysInfo wVersionID versionID szBookInfo bookInfo + , "@ szBookInfo wBookID bookInfoByBookID RuntimePath =PdiscIniString DISC INFO runtimePath version =PdiscIniString DISC INFO discVersionID szSysInfo wConfigFile configFile wDiscConfigFile szSysInfo discConfigFile szSysInfo wIndexApp indexApp szSysInfo wIndexCaption indexCaption szSysInfo wRomDrive romDrive szSysInfo qtromDrive .chooseDirectoryDlg wRomDrive romDrive Select ROM Drive configFile STARTUP ,writeIniItem setRomDrive wStartupDir szSysInfo .chooseDirectoryDlg Select Startup Directory wConfigFile STARTUP ,writeIniItem startupDir setStartupDirectory szSysInfo wStartupDir startupDir + , / myPath setCurrentDirectory szSysInfo wStartupDir setCurrentDrive setStartupDirectory szSysInfo wExtension extension + , > + , #> wDiscConfigFile szSysInfo isFile wRomDrive iniString discIniString issueName =PdiscIniString DISC INFO discIssueName issueID =PdiscIniString DISC INFO discIssueID szSysInfo iniString Prefs wConfigFile preference + , "Q + , "Q + , "@ + , "@ szAppName false szSysInfo wAppName wRomDrive appName wShortName =PdiscIniString DISC INFO isAppBook Wrong or missing disc! Please replace and try again. strDiscError w, #? not found. Please make certain the right disc is in the CD-ROM drive. 1appName strFileNotFound + , #? + , #? Wrong szSysInfo version! to the latest version of wAppName wVersionID is installed and you are attempting to open a You may wish to upgrade file. Version strWrongVersion szSysInfo Do you wish to perform an upgrade now? disc is in the drive. wVersionID is installed and a X6upgrade Version wrongDiscVersion + , #> + , #> + , #? szSysInfo szExec wRomDrive wAppName szSysInfo upgrade.ins isFile wRomDrive Yield wAppName Upgrade program not found. Please make sure the latest disc is in your CD-ROM drive. setup.exe upgrade Please run Setup to correct this problem. strBadSetup + , #? w, #> Copyright(c) szSysInfo Portions Copyright(c) , Metatec Corp. wAppName wVersionID Metatec Corp. SsysInfo All rights reserved. Version helpAbout .chooseDirectoryDlg Select Directory selectDir wTries szSysInfo wStartupDir runtimePath fts30mtb.dll ftsIndexName fullTextSearch ftsSearch search szPath pgRef ftsSearch You must build a Search Index for this book. Cannot navigate to ftsIndexName fullTextSearch end &File &Open... Ctrl+O &Save Ctrl+S Save &As... saveas &Import... import &Export... export Print Set&up... printsetup &Print Pages... Ctrl+P printpages Prin&t Report... printreport Send &Mail... sendmail &Run... E&xit Alt+F4 &Edit &Undo Ctrl+Z Cu&t Ctrl+X &Copy Ctrl+C &Paste Ctrl+V paste C&lear Del clear Select &All Shift+F9 selectall Select Pa&ge Shift+F12 selectpage &Size to Page F11 sizetopage F&ind... F5 search Re&place... replace A&uthor F3 author &Text &Character... F6 character &Paragraph... F7 paragraph &Regular Ctrl+Space regular &Bold Ctrl+B &Italic Ctrl+I italic &Underline Ctrl+U underline Stri&keout Ctrl+K strikeout Superscrip&t/Subscript super/subscript &Normal Script normalscript Su&bscript Ctrl+L subscript Su&perscript Ctrl+Shift+L superscript &Show Hotwords F9 showhotwords &Page &Next Alt+Right &Previous Alt+Left previous &First Alt+Up first &Last Alt+Down &Back Shift+F2 &History... Ctrl+F2 history N&ew Page Ctrl+N newpage &Help &Contents F1 contents Status &Bar F12 statusbar Small Fonts 6121 ^